%put :: ;
%put ::+++++++++++++ Defines macro DEFINE(YR) ++++++++++++:: ;
%put ::+++ This file defines macro vars that can be    +++:: ;
%put ::+++ referenced in other parts of a SAS program  +++:: ;
%put ::+++ ------------------------------------------- +++:: ; 
%put ::+++ Original author: Lars Vilhuber              +++:: ;
%put ::+++ last modified:                              +++:: ;
%put ::+++ Time-stamp: <00/08/21 14:46:37 vilhu001>    +++:: ;
%put ::+++ ------------------------------------------- +++:: ;
/* To use these definitions add the following */
/* lines to your SAS program                  */
/*  %include '/programs/projects/sipp/def-cross.sas'*/
/* and call the macro defined here as         */
/*  %define(90) (f.i.)                        */
/* Editing this file:                         */
/*   Feel free to add macro variables, but    */
/*   to work, they need to be referenced by   */
/*   the first command within the macro       */
/*   (the global statement)                   */

%put ::+++ It defines the following macro variables: ;

%let globvars=smpunt1 smpunt2 smpunt3 smpunt4 smpunt5 smpunt6 smpunt7
        smpunt8 smpunt9 smpunt10 hwave1 hwave2 hwave3 hwave4
        hwave5 hwave6 hwave7 hwave8 hwave9 hwave10 hwave11 hwave12
        pwave1 pwave2 pwave3 pwave4 pwave5 pwave6 pwave7 pwave8 
        pwave9 pwave10 pwave11 pwave12
        pwavem1 pwavem2 pwavem3 pwavem4 pwavem5 pwavem6 pwavem7 pwavem8 
        pwavem9 pwavem10 pwavem11 pwavem12
        family1 family2 family3 family4 family4 family5 family6
        family7 family8 family9 family10 family11 family12 
        gen1tp1 gen1tp2 gen1tp3
        gen1tp4 gen1tp5 gen1tp6 gen1tp7 gen1tp8 gen1tp9 gen1tp10
        gen2tp1 gen2tp2 gen2tp3 gen2tp4 gen2tp5 gen2tp6 gen2tp7
        gen2tp8 gen2tp9 gen2tp10 slfemp1 slfemp2 slfemp3 slfemp4
        slfemp5 slfemp6 slfemp7 slfemp8 slfemp9 slfemp10 
        wagsal1 wagsal2 wagsal3 wagsal4 wagsal5 wagsal6 wagsal7 wagsal8
        wagsal9 wagsal10 wagsal11 wagsal12
        uwagsal1 uwagsal2 uwagsal3 uwagsal4 uwagsal5 uwagsal6 uwagsal7 uwagsal8
        uwagsal9 uwagsal10 uwagsal11 uwagsal12
        maxwave fpinx1 fpinxx1 fpinx2 fpinxx2 fpinx3 fpinxx3 fpinx4 fpinxx4 fpinx5 fpinxx5
	fpinx6 fpinxx6 fpinx7 fpinxx7 fpinx8 fpinxx8 fpinx9 fpinxx9 fpinx10
	fpinxx10 panel1 panel2 panel3 panel4 panel5 panel6
        educsource1 educsource2 educsource3 educsource4 educsource5 educsource6
        educsource7 educsource8 educsource9 educsource10 educsource11 educsource12
        lfsource1 lfsource2 lfsource3 lfsource4 lfsource5 lfsource6
        lfsource7 lfsource8 lfsource9 lfsource10 lfsource11 lfsource12
        hisource1 selfemp1 selfemp2 selfemp3 selfemp4 selfemp5 selfemp6 selfemp7
        selfemp8 selfemp9 selfemp10 selfemp11 selfemp12;

%put ::+++ &globvars.;
%put ::+++++++++++++++++++++++++++++++++++++++++++++++++++++;

%global globvars;
%macro define(year);

/* add new variables to this line to keep them for other macros */
%* %global smpunt1 smpunt2 smpunt3 smpunt4 smpunt5 smpunt6 smpunt7
%* 	   smpunt8 smpunt9 smpunt10 
%*         hwave1 hwave2 hwave3 hwave4
%*         hwave5 hwave6 hwave7 hwave8 hwave9 hwave10 hwave11 hwave12 
%*         pwave1 pwave2
%* 	   pwave3 pwave4 pwave5 pwave6 pwave7 pwave8 pwave9 pwave10 pwave11 pwave12
%*         pwavem1 pwavem2
%* 	   pwavem3 pwavem4 pwavem5 pwavem6 pwavem7 pwavem8 pwavem9 pwavem10 pwavem11 pwavem12
%* 	   family1 family2 family3 family4 family4 family5 family6
%* 	   family7 family8 family9 family10 family11 family12
%*         gen1tp1 gen1tp2 gen1tp3
%* 	   gen1tp4 gen1tp5 gen1tp6 gen1tp7 gen1tp8 gen1tp9 gen1tp10
%* 	   gen2tp1 gen2tp2 gen2tp3 gen2tp4 gen2tp5 gen2tp6 gen2tp7
%* 	   gen2tp8 gen2tp9 gen2tp10 slfemp1 slfemp2 slfemp3 slfemp4
%* 	   slfemp5 slfemp6 slfemp7 slfemp8 slfemp9 slfemp10 
%*         wagsal1
%* 	   wagsal2 wagsal3 wagsal4 wagsal5 wagsal6 wagsal7 wagsal8
%* 	   wagsal9 wagsal10 wagsal11 wagsal12
%*         uwagsal1 uwagsal2 uwagsal3 uwagsal4 uwagsal5 uwagsal6 uwagsal7 uwagsal8
%*         uwagsal9 uwagsal10 uwagsal11 uwagsal12
%* 	   maxwave fpinx1 fpinxx1 fpinx2 fpinxx2 fpinx3 fpinxx3 fpinx4 fpinxx4 fpinx5 fpinxx5
%*	   fpinx6 fpinxx6 fpinx7 fpinxx7 fpinx8 fpinxx8 fpinx9 fpinxx9 fpinx10
%*	   fpinxx10 panel1 panel2 panel3 panel4 panel5 panel6
%*         educsource1 educsource2 educsource3 educsource4 educsource5 educsource6
%*         educsource7 educsource8 educsource9 educsource10 educsource11 educsource12
%*         lfsource1 lfsource2 lfsource3 lfsource4 lfsource5 lfsource6
%*         lfsource7 lfsource8 lfsource9 lfsource10 lfsource11 lfsource12
%*         hisource1 selfemp1 selfemp2 selfemp3 selfemp4 selfemp5 selfemp6 selfemp7
%*         selfemp8 selfemp9 selfemp10 selfemp11 selfemp12;

%global &globvars.;

%let panel2=1990;
%let panel3=1991;
%let panel4=1992;
%let panel5=1993;
%let panel6=1996;

%if &year = 1990 %then %goto def1990;
%else %if &year = 1991 %then %goto def1991;
%else %if &year = 1992 %then %goto def1992;
%else %if &year = 1993 %then %goto def1993;
%else %if &year = 1996 %then %goto def1996;

/*-------------------- definitions: 1990 -------------------- */
%def1990: ; *GEO_CTY ;
%let panel1990=person90;
%let maxwave = 8;
%let workreason = mel1990.wrkrsn1990;
%let emphistm = sipp1990.s0000457;
%let smpunt1 = sipp1990.s0000453;
%let smpunt2 = sipp1990.s0000468;
%let smpunt3 = sipp1990.s0000154;
%let smpunt4 = sipp1990.s0000204;
%let smpunt5 = sipp1990.s0000247;
%let smpunt6 = sipp1990.s0000297;
%let smpunt7 = sipp1990.s0000342;
%let smpunt8 = sipp1990.s0000384;
%let hwave1 = sipp1990.s0000451;
%let hwave2 = sipp1990.s0000462;
%let hwave3 = sipp1990.s0000152;
%let hwave4 = sipp1990.s0000202;
%let hwave5 = sipp1990.s0000250;
%let hwave6 = sipp1990.s0000295;
%let hwave7 = sipp1990.s0000340;
%let hwave8 = sipp1990.s0000382;
%let pwave1 = sipp1990.s0000452;
%let pwave2 = sipp1990.s0000465;
%let pwave3 = sipp1990.s0000153;
%let pwave4 = sipp1990.s0000203;
%let pwave5 = sipp1990.s0000251;
%let pwave6 = sipp1990.s0000296;
%let pwave7 = sipp1990.s0000341;
%let pwave8 = sipp1990.s0000383;
%let family1 = sipp1990.s0000448;
%let family2 = sipp1990.s0000458;
%let family3 = sipp1990.s0000472;
%let family4 = sipp1990.s0000199;
%let family5 = sipp1990.s0000247;
%let family6 = sipp1990.s0000292;
%let family7 = sipp1990.s0000337;
%let family8 = sipp1990.s0000379;
%let gen1tp1 = sipp1990.s0000449;
%let gen1tp2 = sipp1990.s0000460;
%let gen1tp3 = sipp1990.s0000473;
%let gen1tp4 = sipp1990.s0000200;
%let gen1tp5 = sipp1990.s0000248;
%let gen1tp6 = sipp1990.s0000293;
%let gen1tp7 = sipp1990.s0000338;
%let gen1tp8 = sipp1990.s0000380;
%let gen2tp1 = sipp1990.s0000450;
%let gen2tp2 = sipp1990.s0000461;
%let gen2tp3 = sipp1990.s0000474;
%let gen2tp4 = sipp1990.s0000201;
%let gen2tp5 = sipp1990.s0000249;
%let gen2tp6 = sipp1990.s0000294;
%let gen2tp7 = sipp1990.s0000339;
%let gen2tp8 = sipp1990.s0000381;
%let slfemp1 = sipp1990.s0000454;
%let slfemp2 = sipp1990.s0000469;
%let slfemp3 = sipp1990.s0000155;
%let slfemp4 = sipp1990.s0000205;
%let slfemp5 = sipp1990.s0000887;
%let slfemp6 = sipp1990.s0000298;
%let slfemp7 = sipp1990.s0000343;
%let slfemp8 = sipp1990.s0000385;
%let wagsal1 = sipp1990.s0000455;
%let wagsal2 = sipp1990.s0000470;
%let wagsal3 = sipp1990.s0000162;
%let wagsal4 = sipp1990.s0000211;
%let wagsal5 = sipp1990.s0000256;
%let wagsal6 = sipp1990.s0000304;
%let wagsal7 = sipp1990.s0000348;
%let wagsal8 = sipp1990.s0000389;
%let fpinx1 = FF_PIN;
%let fpinxx1 =FF_PIN;
%let fpinx2 = FF_PIN0;
%let fpinxx2 =FF_PIN ;
%let fpinx3 = FF_PIN;
%let fpinxx3 =FF_PIN ;
%let fpinx4 = FF_PIN0 ;
%let fpinxx4 =FF_PIN ;
%let fpinx5 = FF_PIN;
%let fpinxx5 =FF_PIN ;
%let fpinx6 = FF_PIN0 ;
%let fpinxx6 =FF_PIN ;
%let fpinx7 = FF_PIN0 ;
%let fpinxx7 =FF_PIN ;
%let fpinx8 = FF_PIN0;
%let fpinxx8 =FF_PIN ;
%let fpinx9 = FF_PIN0;
%let fpinxx9 =FF_PIN ;
%let fpinx10= FF_PIN0;
%let fpinxx10=FF_PIN ;
%goto enddef;

/*-------------------- definitions: 1991 -------------------- */
%def1991: ;
%let panel1991=person91;
%let maxwave = 8;
%let workreason = mel1991.wrkrsn1991;
%let emphistm = sipp1991.S0000138;
%let smpunt1 = sipp1991.s0000124;
%let smpunt2 = sipp1991.s0000148;
%let smpunt3 = sipp1991.s0000192;
%let smpunt4 = sipp1991.s0000240;
%let smpunt5 = sipp1991.s0000286;
%let smpunt6 = sipp1991.s0000334;
%let smpunt7 = sipp1991.s0000371;
%let smpunt8 = sipp1991.s0000406;
%let hwave1 = sipp1991.S0000122;
%let hwave2 = sipp1991.S0000142;
%let hwave3 = sipp1991.S0000190;
%let hwave4 = sipp1991.S0000238;
%let hwave5 = sipp1991.S0000284;
%let hwave6 = sipp1991.S0000332;
%let hwave7 = sipp1991.S0000369;
%let hwave8 = sipp1991.S0000404;
%let pwave1 = sipp1991.s0000123;
%let pwave2 = sipp1991.s0000145;
%let pwave3 = sipp1991.s0000191;
%let pwave4 = sipp1991.s0000239;
%let pwave5 = sipp1991.s0000285;
%let pwave6 = sipp1991.s0000333;
%let pwave7 = sipp1991.s0000370;
%let pwave8 = sipp1991.s0000405;
%let family1 = sipp1991.s0000119;
%let family2 = sipp1991.s0000139;
%let family3 = sipp1991.s0000187;
%let family4 = sipp1991.s0000235;
%let family5 = sipp1991.s0000281;
%let family6 = sipp1991.s0000329;
%let family7 = sipp1991.s0000366;
%let family8 = sipp1991.s0000401;
%let gen1tp1 = sipp1991.s0000120;
%let gen1tp2 = sipp1991.s0000140;
%let gen1tp3 = sipp1991.s0000188;
%let gen1tp4 = sipp1991.s0000236;
%let gen1tp5 = sipp1991.s0000282;
%let gen1tp6 = sipp1991.s0000330;
%let gen1tp7 = sipp1991.s0000367;
%let gen1tp8 = sipp1991.s0000402;
%let gen2tp1 = sipp1991.s0000121;
%let gen2tp2 = sipp1991.s0000141;
%let gen2tp3 = sipp1991.s0000189;
%let gen2tp4 = sipp1991.s0000237;
%let gen2tp5 = sipp1991.s0000283;
%let gen2tp6 = sipp1991.s0000331;
%let gen2tp7 = sipp1991.s0000368;
%let gen2tp8 = sipp1991.s0000403;
%let slfemp1 = sipp1991.s0000125;
%let slfemp2 = sipp1991.s0000149;
%let slfemp3 = sipp1991.s0000193;
%let slfemp4 = sipp1991.s0000241;
%let slfemp5 = sipp1991.s0000287;
%let slfemp6 = sipp1991.s0000335;
%let slfemp7 = sipp1991.s0000372;
%let slfemp8 = sipp1991.s0000407;
%let wagsal1 = sipp1991.s0000126;
%let wagsal2 = sipp1991.s0000150;
%let wagsal3 = sipp1991.s0000198;
%let wagsal4 = sipp1991.s0000246;
%let wagsal5 = sipp1991.s0000291;
%let wagsal6 = sipp1991.s0000336;
%let wagsal7 = sipp1991.s0000378;
%let wagsal8 = sipp1991.s0000411;
%let fpinx1 = FF_PIN0;
%let fpinxx1 =FF_PIN ;
%let fpinx2 = FF_PIN0 ;
%let fpinxx2 =FF_PIN ;
%let fpinx3 = FF_PIN0 ;
%let fpinxx3 =FF_PIN ;
%let fpinx4 = FF_PIN0;
%let fpinxx4 =FF_PIN ;
%let fpinx5 = FF_PIN0;
%let fpinxx5 =FF_PIN ;
%let fpinx6 = FF_PIN0;
%let fpinxx6 =FF_PIN ;
%let fpinx7 = FF_PIN0 ;
%let fpinxx7 =FF_PIN ;
%let fpinx8 = FF_PIN0 ;
%let fpinxx8 =FF_PIN;
%let fpinx9 = FF_PIN0 ;
%let fpinxx9 =FF_PIN ;
%let fpinx10= FF_PIN0;
%let fpinxx10=FF_PIN ;
%goto enddef;

/*-------------------- definitions: 1992 -------------------- */
%def1992: ;
%let panel1992=person92;
%let maxwave = 10;
%let workreason = mel1992.wrkrsn1992;
%let emphistm = sipp1992.S0000134;
%let smpunt1 = sipp1992.s0000132;
%let smpunt2 = sipp1992.s0000183;
%let smpunt3 = sipp1992.s0000232;
%let smpunt4 = sipp1992.s0000273;
%let smpunt5 = sipp1992.s0000322;
%let smpunt6 = sipp1992.s0000357;
%let smpunt7 = sipp1992.s0000394;
%let smpunt8 = sipp1992.s0000420;
%let smpunt9 = sipp1992.s0000037;
%let smpunt10 = sipp1992.s0000048;
%let hwave1 = sipp1992.s0000130;
%let hwave2 = sipp1992.s0000178;
%let hwave3 = sipp1992.s0000230;
%let hwave4 = sipp1992.s0000271;
%let hwave5 = sipp1992.s0000320;
%let hwave6 = sipp1992.s0000355;
%let hwave7 = sipp1992.s0000393;
%let hwave8 = sipp1992.s0000418;
%let hwave9 = sipp1992.s0000036;
%let hwave10 = sipp1992.s0000046;
%let pwave1 = sipp1992.s0000131;
%let pwave2 = sipp1992.s0000181;
%let pwave3 = sipp1992.s0000231;
%let pwave4 = sipp1992.s0000272;
%let pwave5 = sipp1992.s0000321;
%let pwave6 = sipp1992.s0000356;
%let pwave7 = sipp1992.s0000615;
%let pwave8 = sipp1992.s0000419;
%let pwave9 = sipp1992.s0000090;
%let pwave10 = sipp1992.pwv10fix;
%let family1 = sipp1992.s0000127;
%let family2 = sipp1992.s0000174;
%let family3 = sipp1992.s0000227;
%let family4 = sipp1992.s0000268;
%let family5 = sipp1992.s0000317;
%let family6 = sipp1992.s0000352;
%let family7 = sipp1992.s0000390;
%let family8 = sipp1992.s0000653;
%let family9 = sipp1992.s0000035;
%let family10 = sipp1992.fwv10fix;
%let gen1tp1 = sipp1992.s0000128;
%let gen1tp2 = sipp1992.s0000176;
%let gen1tp3 = sipp1992.s0000228;
%let gen1tp4 = sipp1992.s0000269;
%let gen1tp5 = sipp1992.s0000318;
%let gen1tp6 = sipp1992.s0000353;
%let gen1tp7 = sipp1992.s0000391;
%let gen1tp8 = sipp1992.s0000416;
%let gen1tp9 = sipp1992.s0000088;
%let gen1tp10 = sipp1992.s0000044;
%let gen2tp1 = sipp1992.s0000129;
%let gen2tp2 = sipp1992.s0000177;
%let gen2tp3 = sipp1992.s0000229;
%let gen2tp4 = sipp1992.s0000270;
%let gen2tp5 = sipp1992.s0000319;
%let gen2tp6 = sipp1992.s0000354;
%let gen2tp7 = sipp1992.s0000392;
%let gen2tp8 = sipp1992.s0000417;
%let gen2tp9 = sipp1992.s0000089;
%let gen2tp10 = sipp1992.s0000045;
%let slfemp1 = sipp1992.s0000133;
%let slfemp2 = sipp1992.s0000184;
%let slfemp3 = sipp1992.s0000233;
%let slfemp4 = sipp1992.s0000274;
%let slfemp5 = sipp1992.s0000323;
%let slfemp6 = sipp1992.s0000358;
%let slfemp7 = sipp1992.s0000395;
%let slfemp8 = sipp1992.s0000421;
%let slfemp9 = sipp1992.s0000091;
%let slfemp10 = sipp1992.s0000049;
%let wagsal1 = sipp1992.s0000136;
%let wagsal2 = sipp1992.s0000185;
%let wagsal3 = sipp1992.s0000234;
%let wagsal4 = sipp1992.s0000280;
%let wagsal5 = sipp1992.s0000327;
%let wagsal6 = sipp1992.s0000365;
%let wagsal7 = sipp1992.s0000400;
%let wagsal8 = sipp1992.s0000425;
%let wagsal9 = sipp1992.s0000096;
%let wagsal10 = sipp1992.wgs10fix;
%let fpinx1 = FF_PIN0;
%let fpinxx1 =FF_PIN;
%let fpinx2 = FF_PIN0;
%let fpinxx2 =FF_PIN;
%let fpinx3 = FF_PIN0;
%let fpinxx3 =FF_PIN;
%let fpinx4 = FF_PIN0;
%let fpinxx4 =FF_PIN;
%let fpinx5 = FF_PIN0;
%let fpinxx5 =FF_PIN;
%let fpinx6 = FF_PIN0;
%let fpinxx6 =FF_PIN;
%let fpinx7 = FF_PIN0;
%let fpinxx7 =FF_PIN;
%let fpinx8 = FF_PIN0;
%let fpinxx8 =FF_PIN;
%let fpinx9 = FF_PIN0;
%let fpinxx9 =FF_PIN;
%let fpinx10= FF_PIN;
%let fpinxx10=FF_PIN;
%goto enddef;

/*-------------------- definitions: 1993 -------------------- */
%def1993: ;
%let panel1993=person93;
%let maxwave = 9;
%let workreason = mel1993.wrkrsn1993;
%let emphistm = sipp1993.S0000170;
%let smpunt1 = sipp1993.s0000168;
%let smpunt2 = sipp1993.s0000222;
%let smpunt3 = sipp1993.s0000261;
%let smpunt4 = sipp1993.s0000310;
%let smpunt5 = sipp1993.s0000561;
%let smpunt6 = sipp1993.s0000079;
%let smpunt7 = sipp1993.s0000027;
%let smpunt8 = sipp1993.s0001099;
%let smpunt9 = sipp1993.s0001088;
%let hwave1 = sipp1993.s0000166;
%let hwave2 = sipp1993.s0000217;
%let hwave3 = sipp1993.s0000259;
%let hwave4 = sipp1993.s0000308;
%let hwave5 = sipp1993.s0000940;
%let hwave6 = sipp1993.s0000078;
%let hwave7 = sipp1993.s0000024;
%let hwave8 = sipp1993.s0001101;
%let hwave9 = sipp1993.s0001090;
%let pwave1 = sipp1993.s0000167;
%let pwave2 = sipp1993.s0000220;
%let pwave3 = sipp1993.s0000260;
%let pwave4 = sipp1993.s0000309;
%let pwave5 = sipp1993.s0000941;
%let pwave6 = sipp1993.s0000016;
%let pwave7 = sipp1993.s0000026;
%let pwave8 = sipp1993.s0001100;
%let pwave9 = sipp1993.s0001089;
%let family1 = sipp1993.s0000163;
%let family2 = sipp1993.s0000213;
%let family3 = sipp1993.s0000497;
%let family4 = sipp1993.s0000305;
%let family5 = sipp1993.s0000349;
%let family6 = sipp1993.s0000076;
%let family7 = sipp1993.s0000021;
%let family8 = sipp1993.s0001104;
%let family9 = sipp1993.s0001093;
%let gen1tp1 = sipp1993.s0000164;
%let gen1tp2 = sipp1993.s0000215;
%let gen1tp3 = sipp1993.s0000257;
%let gen1tp4 = sipp1993.s0000306;
%let gen1tp5 = sipp1993.s0000350;
%let gen1tp6 = sipp1993.s0000014;
%let gen1tp7 = sipp1993.s0000022;
%let gen1tp8 = sipp1993.s0001103;
%let gen1tp9 = sipp1993.s0001092;
%let gen2tp1 = sipp1993.s0000165;
%let gen2tp2 = sipp1993.s0000216;
%let gen2tp3 = sipp1993.s0000258;
%let gen2tp4 = sipp1993.s0000307;
%let gen2tp5 = sipp1993.s0000351;
%let gen2tp6 = sipp1993.s0000077;
%let gen2tp7 = sipp1993.s0000023;
%let gen2tp8 = sipp1993.s0001102;
%let gen2tp9 = sipp1993.s0001091;
%let slfemp1 = sipp1993.s0000169;
%let slfemp2 = sipp1993.s0000223;
%let slfemp3 = sipp1993.s0000262;
%let slfemp4 = sipp1993.s0000311;
%let slfemp5 = sipp1993.s0000942;
%let slfemp6 = sipp1993.s0000080;
%let slfemp7 = sipp1993.s0000028;
%let slfemp8 = sipp1993.s0001098;
%let slfemp9 = sipp1993.s0001087;
%let wagsal1 = sipp1993.s0000172;
%let wagsal2 = sipp1993.s0000224;
%let wagsal3 = sipp1993.s0000267;
%let wagsal4 = sipp1993.s0000316;
%let wagsal5 = sipp1993.s0000562;
%let wagsal6 = sipp1993.s0000086;
%let wagsal7 = sipp1993.s0000034;
%let wagsal8 = sipp1993.s0001094;
%let wagsal9 = sipp1993.s0001077;
%let fpinx1 = FF_PIN0;
%let fpinxx1 =FF_PIN ;
%let fpinx2 = FF_PIN0 ;
%let fpinxx2 =FF_PIN ;
%let fpinx3 = FF_PIN0 ;
%let fpinxx3 =FF_PIN ;
%let fpinx4 = FF_PIN0;
%let fpinxx4 =FF_PIN ;
%let fpinx5 = FF_PIN0;
%let fpinxx5 =FF_PIN ;
%let fpinx6 = FF_PIN0;
%let fpinxx6 =FF_PIN ;
%let fpinx7 = FF_PIN0 ;
%let fpinxx7 =FF_PIN ;
%let fpinx8 = FF_PIN0 ;
%let fpinxx8 =FF_PIN;
%let fpinx9 = FF_PIN0 ;
%let fpinxx9 =FF_PIN ;
%let fpinx10= FF_PIN0;
%let fpinxx10=FF_PIN ;
%goto enddef;


/*-------------------- definitions: 1996 -------------------- */
%def1996: ;
%let maxwave = 12;
%let emphistm = s1996w1.ew1_emp;
%let hwave1 = s1996w1.ew1_hh;
%let hwave2 = s1996w2.ew2_hh;
%let hwave3 = s1996w3.ew3_hh;
%let hwave4 = s1996w4.ew4_hh;
%let hwave5 = s1996w5.ew5_hh;
%let hwave6 = s1996w6.ew6_hh;
%let hwave7 = s1996w7.ew7_hh;
%let hwave8 = s1996w8.ew8_hh;
%let hwave9 = s1996w9.ew9_hh;
%let hwave10 = s1996w10.ew10_hh;
%let hwave11 = s1996w11.ew11_hh;
%let hwave12 = s1996w12.ew12_hh;

%let family1 = s1996w1.ew1_ffm;
%let family2 = s1996w2.ew2_ffm;
%let family3 = s1996w3.ew3_ffm;
%let family4 = s1996w4.ew4_ffm;
%let family5 = s1996w5.ew5_ffm;
%let family6 = s1996w6.ew6_ffm;
%let family7 = s1996w7.ew7_ffm;
%let family8 = s1996w8.ew8_ffm;
%let family9 = s1996w9.ew9_ffm;
%let family10 = s1996w10.ew10_ffm;
%let family11 = s1996w11.ew11_ffm;
%let family12 = s1996w12.ew12_ffm;

%let pwave1 = s1996w1.ew1_pp;
%let pwave2 = s1996w2.ew2_pp;
%let pwave3 = s1996w3.ew3_pp;
%let pwave4 = s1996w4.ew4_pp;
%let pwave5 = s1996w5.ew5_pp;
%let pwave6 = s1996w6.ew6_pp;
%let pwave7 = s1996w7.ew7_pp;
%let pwave8 = s1996w8.ew8_pp;
%let pwave9 = s1996w9.ew9_pp;
%let pwave10 = s1996w10.ew10_pp;
%let pwave11 = s1996w11.ew11_pp;
%let pwave12 = s1996w12.ew12_pp;

%let pwavem1 = s1996w1.ew1_ppm;
%let pwavem2 = s1996w2.ew2_ppm;
%let pwavem3 = s1996w3.ew3_ppm;
%let pwavem4 = s1996w4.ew4_ppm;
%let pwavem5 = s1996w5.ew5_ppm;
%let pwavem6 = s1996w6.ew6_ppm;
%let pwavem7 = s1996w7.ew7_ppm;
%let pwavem8 = s1996w8.ew8_ppm;
%let pwavem9 = s1996w9.ew9_ppm;
%let pwavem10 = s1996w10.ew10_ppm;
%let pwavem11 = s1996w11.ew11_ppm;
%let pwavem12 = s1996w12.ew12_ppm;

%let wagsal1 = s1996w1.ew1_jb;
%let wagsal2 = s1996w2.ew2_jb;
%let wagsal3 = s1996w3.ew3_jb;
%let wagsal4 = s1996w4.ew4_jb;
%let wagsal5 = s1996w5.ew5_jb;
%let wagsal6 = s1996w6.ew6_jb;
%let wagsal7 = s1996w7.ew7_jb;
%let wagsal8 = s1996w8.ew8_jb;
%let wagsal9 = s1996w9.ew9_jb;
%let wagsal10 = s1996w10.ew10_jb;
%let wagsal11 = s1996w11.ew11_jb;
%let wagsal12 = s1996w12.ew12_jb;

%let uwagsal1 = s1996w1.uw1_jb;
%let uwagsal2 = s1996w2.uw2_jb;
%let uwagsal3 = s1996w3.uw3_jb;
%let uwagsal4 = s1996w4.uw4_jb;
%let uwagsal5 = s1996w5.uw5_jb;
%let uwagsal6 = s1996w6.uw6_jb;
%let uwagsal7 = s1996w7.uw7_jb;
%let uwagsal8 = s1996w8.uw8_jb;
%let uwagsal9 = s1996w9.uw9_jb;
%let uwagsal10 = s1996w10.uw10_jb;
%let uwagsal11 = s1996w11.uw11_jb;
%let uwagsal12 = s1996w12.uw12_jb;

%let educsource1=s1996w1.ew1_ad;
%let educsource2=s1996w2.ew2_pp;
%let educsource3=s1996w3.ew3_pp;
%let educsource4=s1996w4.ew4_pp;
%let educsource5=s1996w5.ew5_pp;
%let educsource6=s1996w6.ew6_pp;
%let educsource7=s1996w7.ew7_pp;
%let educsource8=s1996w8.ew8_pp;
%let educsource9=s1996w9.ew9_pp;
%let educsource10=s1996w10.ew10_pp;
%let educsource11=s1996w11.ew11_pp;
%let educsource12=s1996w12.ew12_pp;

%let lfsource1=s1996w1.ew1_ad;
%let lfsource2=s1996w2.ew2_ad;
%let lfsource3=s1996w3.ew3_ad;
%let lfsource4=s1996w4.ew4_ad;
%let lfsource5=s1996w5.ew5_ad;
%let lfsource6=s1996w6.ew6_ad;
%let lfsource7=s1996w7.ew7_ad;
%let lfsource8=s1996w8.ew8_ad;
%let lfsource9=s1996w9.ew9_ad;
%let lfsource10=s1996w10.ew10_ad;
%let lfsource11=s1996w11.ew11_ad;
%let lfsource12=s1996w12.ew12_ad;

%let hisource1=s1996w1.ew1_pp;

%let selfemp1=s1996w1.ew1_bs;
%let selfemp2=s1996w2.ew2_bs;
%let selfemp3=s1996w3.ew3_bs;
%let selfemp4=s1996w4.ew4_bs;
%let selfemp5=s1996w5.ew5_bs;
%let selfemp6=s1996w6.ew6_bs;
%let selfemp7=s1996w7.ew7_bs;
%let selfemp8=s1996w8.ew8_bs;
%let selfemp9=s1996w9.ew9_bs;
%let selfemp10=s1996w10.ew10_bs;
%let selfemp11=s1996w11.ew11_bs;
%let selfemp12=s1996w12.ew12_bs;

%goto enddef;

%enddef: ;

%mend;

